perm filename LINEN[MUS,LCS]2 blob sn#168159 filedate 1975-07-10 generic text, type T, neo UTF8
00010	
00150	COMPILE;
00200	INSTRUMENT LIN;
00400	LINEN(P4,P7,P9,P8,P5,P10); < AMP,ATT,DECAY,DUR,FUNC,PNTR
00500	OSCIL(U1,MAG*P3,P6);
00700	OUTA←OUTA+U2;
00800	END;
00900	FINISH;
01000	SEG(F1);0,1  1,25 .3,50  0,75  0,100;
01050	SYNTH(F3);1,1  2,.4  3,.1  999;
01100	PLAY;LIN 0 .5 A 2000 F1 F3 .02 .3 P2 0;FINISH;